; Music of Mortadela y Filemon 2 (1990) (Animagic)
; Ripped by Megachur the 12/02/2007

	write "MORTAYF2.BIN"

music_date_rip	equ &0c27
music_adr	equ &32f3
first_theme	equ 0
last_theme	equ 0

	read "music_header_v1_0.asm"
;
.init_music
;
	call l3df1
	di
	xor a
	ld de,l3bc4
	call l3313
	ld de,l3c8f
	inc a
	call l3313
	ld de,l3d24
	inc a
	call l3313
	ei
;	halt
;	halt
;	halt
;	halt
;	halt
	defs 5,0
	ret
.l3313
	push af
	push de
	ld de,#002e
	call l36d4
	ld de,l382c
	add hl,de
	push hl
	xor a
	ld b,#2e
.l3323
	ld (hl),a
	inc hl
	djnz l3323
	pop hl
	pop de
	ld (hl),e
	inc hl
	ld (hl),d
	inc hl
	ld (hl),e
	inc hl
	ld (hl),d
	pop af
	ret
;
.play_music
.l3332
;
	push af
	ld b,#03
	xor a
	ld ix,l382c
	ld de,l3821
	ld hl,l3829
.l3340
	push af
	push hl
	push de
	push bc
	ld (l381f),a
	ld a,(ix+#04)
	or (ix+#05)
	jp nz,l33ab
	xor a
	call l3675
	ld c,(ix+#02)
	ld b,(ix+#03)
	ld a,b
	or c
	jp z,l3464
.l335f
	ld a,(bc)
	cp #80
	jp c,l336e
	sub #80
	ld hl,l3803
	call l3703
	jp (hl)
.l336e
	push af
	call l36c9
	pop af
	add (hl)
	ld hl,l3743
	call l3703
	ld (ix+#0a),l
	ld (ix+#0b),h
	inc bc
.l3381
	ld a,(ix+#08)
	call l3675
	call l34e0
	ld (ix+#2a),#00
	call l34f8
	ld (ix+#2b),#00
	ld (ix+#2c),#00
.l3399
	ld (ix+#02),c
	ld (ix+#03),b
	ld l,(ix+#06)
	ld h,(ix+#07)
	ld (ix+#04),l
	ld (ix+#05),h
.l33ab
	ld l,(ix+#04)
	ld h,(ix+#05)
	dec hl
	ld (ix+#04),l
	ld (ix+#05),h
	push ix
	pop iy
	ld d,#02
	ld c,#00
.l33c0
	ld a,(iy+#0c)
	or a
	jr z,l33cd
	dec a
	ld (iy+#0c),a
	inc c
	jr l33ee
.l33cd
	ld a,(iy+#0e)
	or a
	jr z,l33e9
	dec a
	ld (iy+#0e),a
	ld a,(ix+#2a)
	add (iy+#1b)
	ld (ix+#2a),a
	ld a,(iy+#20)
	ld (iy+#0c),a
	inc c
	jr l33ee
.l33e9
	inc iy
	dec d
	jr nz,l33c0
.l33ee
	ld a,c
	or a
	jr nz,l33f9
	bit 0,(ix+#2d)
	call nz,l34e0
.l33f9
	push ix
	pop iy
	ld d,#03
	ld c,#00
.l3401
	ld a,(iy+#10)
	or a
	jr z,l340e
	dec a
	ld (iy+#10),a
	inc c
	jr l3459
.l340e
	ld a,(iy+#13)
	or a
	jr z,l3454
	dec a
	ld (iy+#13),a
	ld a,(iy+#1d)
	or a
	jp p,l3438
	ld a,(iy+#1d)
	cpl
	inc a
	ld e,a
	ld a,(ix+#2b)
	sub e
	ld (ix+#2b),a
	ld a,(ix+#2c)
	sbc #00
	and #0f
	ld (ix+#2c),a
	jr l344b
.l3438
	ld a,(ix+#2b)
	add (iy+#1d)
	ld (ix+#2b),a
	ld a,(ix+#2c)
	adc #00
	and #0f
	ld (ix+#2c),a
.l344b
	ld a,(iy+#22)
	ld (iy+#10),a
	inc c
	jr l3459
.l3454
	inc iy
	dec d
	jr nz,l3401
.l3459
	ld a,c
	or a
	jr nz,l3464
	bit 1,(ix+#2d)
	call nz,l34f8
.l3464
	pop bc
	pop de
	pop hl
	ld a,(ix+#09)
	add (ix+#2a)
	and #0f
	ld (hl),a
	ld a,(ix+#0a)
	add (ix+#2b)
	ld (de),a
	inc de
	ld a,(ix+#0b)
	adc (ix+#2c)
	ld (de),a
	inc de
	push de
	ld de,#002e
	add ix,de
	pop de
	pop af
	inc a
	inc hl
	dec b
	jp nz,l3340
	ld iy,l38b6
	ld d,#02
	ld c,#00
.l3496
	ld a,(iy+#00)
	or a
	jr z,l34a3
	dec a
	ld (iy+#00),a
	inc c
	jr l34c4
.l34a3
	ld a,(iy+#02)
	or a
	jr z,l34bf
	dec a
	ld (iy+#02),a
	ld a,(l38c2)
	add (iy+#06)
	ld (l38c2),a
	ld a,(iy+#08)
	ld (iy+#00),a
	inc c
	jr l34c4
.l34bf
	inc iy
	dec d
	jr nz,l3496
.l34c4
	ld a,c
	or a
	jr nz,l34d0
	ld a,(l38c0)
	bit 2,a
	call nz,l3510
.l34d0
	ld a,(l38c1)
	ld e,a
	ld a,(l38c2)
	add e
	ld (l3827),a
	call l3710
	pop af
	ret
.l34e0
	push ix
	ld d,#02
.l34e4
	ld a,(ix+#20)
	ld (ix+#0c),a
	ld a,(ix+#16)
	ld (ix+#0e),a
	inc ix
	dec d
	jr nz,l34e4
	pop ix
	ret
.l34f8
	ld d,#03
	push ix
.l34fc
	ld a,(ix+#22)
	ld (ix+#10),a
	ld a,(ix+#18)
	ld (ix+#13),a
	inc ix
	dec d
	jr nz,l34fc
	pop ix
	ret
.l3510
	ld d,#02
	push iy
	ld iy,l38b6
.l3518
	ld a,(iy+#08)
	ld (iy+#00),a
	ld a,(iy+#04)
	ld (iy+#02),a
	inc iy
	dec d
	jr nz,l3518
	pop iy
	ret
.l352c
	inc bc
	ld a,(bc)
	ld (ix+#09),a
	inc bc
	jp l335f
.l3535
	inc bc
	ld a,(bc)
	ld de,(l3820)
	ld d,#00
	call l36d4
	ld (ix+#06),l
	ld (ix+#07),h
	inc bc
	jp l335f
.l354a
	inc bc
	ld a,(bc)
	and #09
	ld (ix+#08),a
	inc bc
	jp l335f
.l3555
	push ix
	pop hl
	xor a
	ld b,#2e
.l355b
	ld (hl),a
	inc hl
	djnz l355b
	ld a,(l381f)
	ld hl,l38c3
	xor (hl)
	jp nz,l3464
	ld hl,l38b6
	ld de,l38b7
	ld bc,#000a
	ld (hl),a
	ldir
	inc de
	ld (de),a
	jp l3464
.l357a
	inc bc
	ld a,(bc)
	push bc
	ld de,#0010
	call l36d4
	ld bc,#0bb8
	push hl
	pop de
	call l36e9
	ld a,c
	ld (l3820),a
	pop bc
	inc bc
	jp l335f
.l3594
	inc bc
	ld a,(bc)
	push af
	and #1f
	ld (l38c1),a
	call l3510
	pop af
	inc bc
	or a
	jp m,l335f
	jp l3381
.l35a8
	inc bc
	jp l3399
.l35ac
	ld c,(ix+#00)
	ld b,(ix+#01)
	ld (ix+#02),c
	ld (ix+#03),b
	jp l335f
	inc bc
	ld a,(bc)
	inc bc
	ld de,#0000
.l35c1
	push af
	ld a,(bc)
	push de
	ld de,(l3820)
	ld d,#00
	call l36d4
	pop de
	add hl,de
	ex de,hl
	inc bc
	pop af
	dec a
	jr nz,l35c1
	ld (ix+#06),l
	ld (ix+#07),h
	jp l335f
.l35de
	inc bc
	ld a,(bc)
	ld e,a
	or (ix+#2d)
	ld (ix+#2d),a
	ld a,(l38c0)
	or e
	ld (l38c0),a
	inc bc
	jp l335f
.l35f2
	inc bc
	res 0,(ix+#2d)
	res 1,(ix+#2d)
	ld a,(bc)
	ld de,#000f
	call l36d4
	ld de,l38cd
	add hl,de
	push ix
	ld d,#0f
.l360a
	ld a,(hl)
	ld (ix+#16),a
	inc hl
	inc ix
	dec d
	jp nz,l360a
	pop ix
	inc bc
	ld (ix+#0c),#00
	ld (ix+#0d),#00
	ld (ix+#10),#00
	ld (ix+#11),#00
	ld (ix+#12),#00
	ld (ix+#2a),#00
	ld (ix+#2b),#00
	ld (ix+#2c),#00
	jp l335f
.l363b
	inc bc
	ld a,(l38c0)
	res 2,a
	ld (l38c0),a
	ld a,(bc)
	ld de,#0006
	call l36d4
	ld de,l39bd
	add hl,de
	ld iy,l38b6
	ld (iy+#00),#00
	ld (iy+#01),#00
	ld d,#06
.l365d
	ld a,(hl)
	ld (iy+#04),a
	inc hl
	inc iy
	dec d
	jr nz,l365d
	xor a
	ld (l38c2),a
	inc bc
	ld a,(l381f)
	ld (l38c3),a
	jp l335f
.l3675
	push de
	cpl
	ld e,a
	ld d,#09
	ld a,(l381f)
.l367d
	dec a
	jp m,l3688
	scf
	rl e
	sla d
	jr l367d
.l3688
	ld a,(l3828)
	or d
	and e
	ld (l3828),a
	pop de
	ret
.l3692
	ld a,(l381f)
	inc bc
	add a
	ld l,a
	ld h,#00
	ld a,(bc)
	inc bc
	ld de,l38c4
	add hl,de
	ld (hl),c
	inc hl
	ld (hl),b
	ld hl,l39c9
	call l3703
	ld b,h
	ld c,l
	jp l335f
.l36ae
	ld a,(l381f)
	add a
	ld l,a
	ld h,#00
	ld de,l38c4
	add hl,de
	ld c,(hl)
	inc hl
	ld b,(hl)
	jp l335f
.l36bf
	inc bc
	call l36c9
	ld a,(bc)
	inc bc
	ld (hl),a
	jp l335f
.l36c9
	ld a,(l381f)
	ld l,a
	ld h,#00
	ld de,l38ca
	add hl,de
	ret
.l36d4
	ld hl,#0000
	and a
	ret z
	push bc
	ld b,#08
.l36dc
	srl a
	jr nc,l36e1
	add hl,de
.l36e1
	sla e
	rl d
	djnz l36dc
	pop bc
	ret
.l36e9
	push af
	ld hl,#0000
	ld a,b
	ld b,#10
.l36f0
	rl c
	rla
	adc hl,hl
	sbc hl,de
	jr nc,l36fa
	add hl,de
.l36fa
	ccf
	djnz l36f0
	rl c
	rla
	ld b,a
	pop af
	ret
.l3703
	push af
	add a
	add l
	ld l,a
	jr nc,l370a
	inc h
.l370a
	ld a,(hl)
	inc hl
	ld h,(hl)
	ld l,a
	pop af
	ret
.l3710
	ld b,#f7
	ld c,#82
	out (c),c
	ld hl,l3821
	ld a,#00
	ld d,#0b
.l371d
	push af
	ld c,(hl)
	ld b,#f4
	out (c),a
	ld b,#f6
	in a,(c)
	or #c0
	out (c),a
	and #3f
	out (c),a
	ld b,#f4
	out (c),c
	ld b,#f6
	ld c,a
	or #80
	out (c),a
	out (c),c
	pop af
	inc a
	inc hl
	dec d
	jr nz,l371d
	ret
.l3743
	dw #0eee,#0e18,#0d4d,#0c8e
	dw #0bda,#0b2f,#0a8f,#09f7
	dw #0968,#08e1,#0861,#07e9
	dw #0777,#070c,#06a7,#0647
	dw #05ed,#0598,#0547,#04fc
	dw #04b4,#0470,#0431,#03f4
	dw #03bc,#0386,#0353,#0324
	dw #02f6,#02cc,#02a4,#027e
	dw #025a,#0238,#0218,#01fa
	dw #01de,#01c3,#01aa,#0192
	dw #017b,#0166,#0152,#013f
	dw #012d,#011c,#010c,#00fd
	dw #00ef,#00e1,#00d5,#00c9
	dw #00be,#00b3,#00a9,#009f
	dw #0096,#008e,#0086,#007f
	dw #0077,#0071,#006a,#0064
	dw #005f,#0059,#0054,#0050
	dw #004b,#0047,#0043,#003f
	dw #003c,#0038,#0035,#0032
	dw #002f,#002d,#002a,#0028
	dw #0026,#0024,#0022,#0020
	dw #001e,#001c,#001b,#0019
	dw #0018,#0016,#0015,#0014
	dw #0013,#0012,#0011,#0010
.l3803
	dw l352c,l354a,l35ac,l3535
	dw l35a8,l357a,l35f2,l3594
	dw l363b,l35de,l3555,l3692
	dw l36ae,l36bf
.l3821 equ $ + 2
.l3820 equ $ + 1
.l381f
	db #2a,#2a,#2a,#2a,#2a,#2a,#0d,#0a
.l382c equ $ + 5
.l3829 equ $ + 2
.l3828 equ $ + 1
.l3827
	db #0d,#0a,#2a,#2a,#2a,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
.l38b6 equ $ + 7
	db #00,#00,#00,#00,#00,#00,#00,#3a
.l38b7
	db #0d,#0a,#45,#4e,#56,#30,#3a,#09
.l38c4 equ $ + 5
.l38c3 equ $ + 4
.l38c2 equ $ + 3
.l38c1 equ $ + 2
.l38c0 equ $ + 1
	db #44,#42,#09,#31,#35,#2c,#30,#2c
.l38cd equ $ + 6
.l38ca equ $ + 3
	db #30,#2c,#30,#2c,#30,#09,#0f,#00
	db #00,#00,#00,#ff,#00,#00,#00,#00
	db #0f,#00,#00,#00,#00,#0a,#00,#00
	db #00,#00,#ff,#00,#00,#00,#00,#01
	db #00,#00,#00,#00,#0c,#00,#1e,#00
	db #00,#ff,#00,#1e,#00,#00,#01,#00
	db #01,#00,#00,#01,#01,#01,#01,#00
	db #04,#fb,#02,#fe,#00,#01,#01,#01
	db #01,#00,#01,#01,#01,#02,#00,#01
	db #fe,#02,#ff,#00,#01,#03,#01,#01
	db #00,#01,#01,#14,#01,#00,#00,#f6
	db #00,#00,#00,#01,#01,#00,#00,#00
	db #0f,#00,#01,#01,#00,#ff,#00,#01
	db #ff,#00,#02,#00,#01,#01,#00,#01
	db #01,#01,#01,#00,#01,#fd,#01,#ff
	db #00,#01,#01,#01,#01,#00,#08,#08
	db #01,#01,#00,#01,#ff,#e2,#1e,#00
	db #06,#06,#01,#01,#00,#01,#01,#00
	db #00,#00,#fe,#02,#00,#00,#00,#01
	db #01,#00,#00,#00,#08,#08,#50,#00
	db #00,#01,#ff,#ff,#00,#00,#06,#0f
	db #02,#00,#00,#02,#08,#00,#00,#00
	db #00,#ff,#00,#00,#00,#01,#01,#00
	db #00,#00,#07,#0f,#00,#00,#00,#01
	db #ff,#00,#00,#00,#01,#02,#00,#00
	db #00,#01,#0a,#00,#00,#00,#0a,#ff
	db #00,#00,#00,#00,#02,#00,#00,#00
	db #01,#01,#01,#01,#00,#01,#ff,#02
	db #fe,#00,#02,#02,#02,#02,#00,#04
	db #0e,#01,#01,#00,#01,#ff,#02,#fe
.l39bd equ $ + 6
	db #00,#08,#1e,#01,#01,#00,#0a,#0f
	db #02,#00,#14,#00,#1e,#00,#f7,#00
	db #01,#00
.l39c9
	dw l3a03,l3a0d,l3a1b,l3a3a
	dw l3a49,l3a56,l3a65,l3a78
	dw l3a8b,l3abc,l3ac8,l3acf
	dw l3ada,l3ae9,l3afb,l3b06
	dw l3b15,l3b24,l3b37,l3b4c
	dw l3b59,l3b66,l3b79,l3b84
	dw l3b92,l3b9d,l3bab,l3bbc
	dw l3bc0
.l3a03
	db #86,#00,#89,#00,#81,#01,#83,#20
.l3a0d equ $ + 2
	db #84,#8c,#83,#04,#84,#37,#3c,#83
	db #08,#37,#83,#04,#34,#39,#34,#8c
.l3a1b
	db #83,#06,#39,#83,#02,#3b,#83,#04
	db #3c,#3b,#80,#0c,#86,#02,#89,#00
	db #81,#09,#30,#80,#0a,#86,#07,#89
.l3a3a equ $ + 7
	db #01,#81,#01,#37,#32,#2f,#8c,#83
	db #04,#30,#30,#30,#83,#08,#30,#83
.l3a49 equ $ + 6
	db #04,#34,#83,#08,#32,#8c,#83,#08
	db #30,#83,#04,#30,#83,#08,#39,#83
.l3a56 equ $ + 3
	db #0c,#37,#8c,#83,#08,#30,#83,#04
	db #34,#83,#08,#30,#83,#04,#30,#32
.l3a65 equ $ + 2
	db #30,#8c,#83,#02,#29,#30,#35,#30
	db #29,#30,#35,#30,#2b,#2f,#32,#2f
.l3a78 equ $ + 5
	db #2b,#2f,#32,#2f,#8c,#83,#02,#28
	db #2f,#34,#2f,#28,#2f,#34,#2f,#2d
	db #30,#34,#30,#2d,#30,#34,#30,#8c
.l3a8b
	db #80,#09,#83,#01,#30,#30,#30,#30
	db #80,#0a,#3c,#3c,#3c,#3c,#80,#0b
	db #3c,#3c,#3c,#3c,#3c,#3c,#3c,#3c
	db #80,#0a,#30,#30,#30,#30,#80,#09
	db #30,#30,#30,#30,#80,#08,#2b,#2b
	db #2b,#2b,#80,#07,#2b,#2b,#2b,#2b
.l3abc equ $ + 1
	db #8c,#83,#08,#2b,#83,#04,#2b,#29
.l3ac8 equ $ + 5
	db #83,#08,#28,#26,#8c,#83,#0c,#24
.l3acf equ $ + 4
	db #83,#14,#1f,#8c,#83,#04,#3c,#3c
.l3ada equ $ + 7
	db #3c,#3c,#83,#08,#3e,#40,#8c,#83
	db #08,#24,#83,#04,#30,#1f,#83,#08
.l3ae9 equ $ + 6
	db #21,#83,#04,#30,#1f,#8c,#83,#06
	db #1d,#83,#02,#1d,#83,#04,#21,#83
	db #08,#1f,#83,#04,#1f,#21,#23,#8c
.l3afb
	db #83,#04,#3c,#48,#48,#3c,#3c,#48
.l3b06 equ $ + 3
	db #48,#3c,#8c,#83,#08,#1d,#83,#04
	db #30,#1d,#83,#08,#1f,#83,#04,#30
.l3b15 equ $ + 2
	db #1f,#8c,#83,#08,#1c,#83,#04,#30
	db #1c,#83,#08,#21,#83,#04,#30,#1f
.l3b24 equ $ + 1
	db #8c,#83,#04,#24,#83,#02,#24,#24
	db #83,#04,#24,#23,#83,#08,#21,#83
.l3b37 equ $ + 4
	db #04,#21,#1f,#8c,#83,#04,#1d,#83
	db #02,#1d,#1d,#83,#04,#1d,#21,#1f
	db #83,#02,#1f,#1f,#83,#04,#1f,#26
.l3b4c equ $ + 1
	db #8c,#83,#04,#3c,#3c,#3c,#83,#08
.l3b59 equ $ + 6
	db #3b,#39,#83,#04,#37,#8c,#83,#08
	db #35,#83,#04,#3c,#83,#0c,#3c,#83
.l3b66 equ $ + 3
	db #08,#3b,#8c,#83,#04,#84,#83,#04
	db #34,#39,#34,#83,#06,#39,#83,#02
.l3b79 equ $ + 6
	db #3b,#83,#04,#3c,#3b,#8c,#83,#04
	db #3c,#3b,#39,#35,#35,#37,#32,#3b
.l3b84 equ $ + 1
	db #8c,#83,#08,#30,#83,#04,#30,#30
.l3b92 equ $ + 7
	db #83,#0c,#2f,#83,#04,#2d,#8c,#83
	db #08,#2b,#83,#04,#28,#2b,#83,#10
.l3b9d equ $ + 2
	db #2d,#8c,#83,#08,#29,#83,#04,#29
	db #2d,#83,#0c,#2b,#83,#04,#26,#8c
.l3bab
	db #83,#0c,#28,#83,#04,#28,#83,#02
	db #26,#24,#83,#04,#24,#83,#08,#24
.l3bc0 equ $ + 5
.l3bbc equ $ + 1
	db #8c,#83,#80,#24,#8c,#83,#40,#3b
	db #8c
.l3bc4
	db #85
	dw #8d32,#8601,#890a,#8100
	dw #8001,#8d01,#8b0d,#861c
	dw #8907,#8101,#8001,#8d0a
	dw #8b01,#8b01,#8b02,#8b01
	dw #8b02,#8b01,#8b02,#8b01
	dw #8b02,#8b01,#8b02,#8b01
	dw #8b02,#8b01,#8b02,#8b01
	dw #8b02,#8b01,#8b02,#8b01
	dw #8b02,#8b03,#8b04,#8b03
	dw #8b04,#8b05,#8b05,#8b05
	dw #8b05,#8b01,#8b02,#8b01
	dw #8b02,#8b06,#8b07,#8b06
	dw #8b07,#8b06,#8607,#8903
	dw #8103,#8001,#8b0b,#8b08
	dw #8b08,#8b08,#8b08,#8b08
	dw #8b08,#8b08,#8608,#890f
	dw #8102,#8001,#8b0b,#8b09
	dw #8b0a,#8b09,#8b0b,#8b0b
	dw #860b,#8907,#8101,#8001
	dw #8b0b,#8b0c,#860d,#8909
	dw #8101,#8001,#8b0c,#800e
	dw #8b0b,#800e,#8d0a,#8b0d
	dw #800e,#8b09,#800e,#8d08
	dw #8b01,#800e,#8b07,#800e
	dw #8d06,#8b0d,#800e,#8b05
	dw #820e
.l3c8f
	db #85
	dw #8d32,#8601,#8907,#8101
	dw #8001,#8d0c,#8b01,#8b0c
	dw #8b0d,#8b0c,#8b0d,#8b0c
	dw #8b0d,#8b0c,#8b0d,#8b0c
	dw #8b0d,#8b0c,#8b0d,#8b0c
	dw #8b0d,#8b0c,#8b0d,#8b0c
	dw #8b0d,#8b0c,#8b0d,#8b0c
	dw #8b0d,#8b0c,#8b0d,#8b0c
	dw #8b0d,#8b0c,#8b0d,#8b0c
	dw #8b0d,#8b0c,#8b0d,#8b0c
	dw #8b0d,#8b0f,#8b10,#8b0f
	dw #8b10,#8b0f,#8b10,#8b11
	dw #8b12,#8b11,#8b12,#8b11
	dw #8b12,#8b11,#8b12,#8b11
	dw #8b12,#8b11,#8b12,#8b11
	dw #8b12,#8b11,#8b12,#8b0c
	dw #800d,#8b0b,#8b0c,#800d
	dw #8b0a,#8b0c,#800d,#8b09
	dw #8b0c,#820d
.l3d24
	db #85
	dw #8d32,#8601,#8900,#8d00
	dw #8b01,#8b00,#8b00,#8b00
	dw #8600,#8906,#8100,#8001
	dw #8b0e,#8b03,#8b04,#8b03
	dw #8b04,#8b13,#8614,#8901
	dw #8100,#8001,#8b0e,#8b15
	dw #8b01,#8b15,#8601,#8907
	dw #8101,#8001,#8b0e,#8b03
	dw #8b14,#8b13,#8604,#8904
	dw #8102,#8001,#8b0e,#8b05
	dw #8b05,#8b05,#8605,#8907
	dw #8101,#8001,#8b0c,#8b05
	dw #8b05,#8b05,#8605,#890f
	dw #8103,#8001,#8b0b,#8b09
	dw #8b0a,#8d09,#8bf5,#8d04
	dw #8b01,#8b0b,#8b0b,#8b0b
	dw #8b16,#8b1c,#8b17,#8b18
	dw #8b19,#861a,#8907,#8101
	dw #8001,#8b0c,#8b03,#8b04
	dw #8b0e,#8b0e,#8b13,#8b14
	dw #8b0e,#8b0e,#8b03,#8b04
	dw #8b13,#8b14,#8b03,#8b04
	dw #8b01,#8d02,#8b08,#8b0e
	dw #800e,#8b0b,#8b0e,#800d
	dw #8b0a,#8b0e,#800e,#8b08
	dw #8b0e,#820d
;
.stop_music
.l3df1
;
	ld de,#0000
	xor a
	call l3313
	ld de,#0000
	ld a,#01
	call l3313
	ld de,#0000
	ld a,#02
	call l3313
	jp l3332

.game_name
	db "Mortadela y Filemon 2",0
.game_year
	db "1990",0
.game_publisher
	db "Animagic",0
.music_author
	db "",0
.music_comment
	db "",0

	read "music_end_v1_0.asm"
